(* file must be set to a filename prior to running this !!! *)
m = Transpose[Import[file,"Table"]];
f[x_]:=1;
n=Dimensions[m];
b = Array[f,Part[n,1]];
c = Array[f,Part[n,2]];
(* MatrixForm[m] *)
v = Quiet[LinearProgramming[c,m,b,Automatic,Integers]];
Print[v//ColumnForm];
Exit[];
